home *** CD-ROM | disk | FTP | other *** search
/ Internet 53 / INTERNET53.iso / pc / software / windows / building / homesite evaluation / data1.cab / HS_Wizards / HTML / Table_Cell.wml < prev    next >
Encoding:
Text File  |  1998-10-08  |  2.0 KB  |  87 lines
  1. <!---- cell ---->
  2.  
  3. <WIZSET j = 0>
  4. <WIZLOOP index="attribute" list="$${Cell}">
  5.     <WIZSET j = j + 1>
  6.     <WIZIF j eq 1>
  7.         <WIZSET Status = attribute>
  8.     <WIZELSEIF j eq 2>
  9.         <WIZSET RowSpan = attribute>
  10.     <WIZELSEIF j eq 3>
  11.         <WIZSET ColSpan = attribute>
  12.     <WIZELSEIF j eq 4>
  13.         <WIZSET Header = attribute>
  14.     <WIZELSEIF j eq 5>
  15.         <WIZSET Content = attribute>
  16.     <WIZELSEIF j eq 6>
  17.         <WIZSET Width = attribute>
  18.     <WIZELSEIF j eq 7>
  19.         <WIZSET NoWrap = attribute>
  20.     <WIZELSEIF j eq 8>
  21.         <WIZSET Align = attribute>
  22.     <WIZELSEIF j eq 9>
  23.         <WIZSET VAlign = attribute>
  24.     </WIZIF>
  25. </WIZLOOP>
  26.  
  27.  
  28. <WIZIF Status neq 'Null'>
  29.  
  30.     <WIZIF Header eq 1> 
  31.         <WIZSET CellTagName = DefaultCase('TH')>
  32.     <WIZELSE>
  33.         <WIZSET CellTagName = DefaultCase('TD')>
  34.     </WIZIF>
  35.  
  36.     <WIZIF RowSpan gt 1>
  37.         <WIZSET aRowSpan = ' ' & DefaultCase('ROWSPAN') & '="' & RowSpan & '"'>
  38.     <WIZELSE>
  39.         <WIZSET aRowSpan = ''>
  40.     </WIZIF>
  41.  
  42.     <WIZIF ColSpan gt 1>
  43.         <WIZSET aColSpan = ' ' & DefaultCase('COLSPAN') & '="' & ColSpan & '"'>
  44.     <WIZELSE>
  45.         <WIZSET aColSpan = ''>
  46.     </WIZIF>
  47.  
  48.     <WIZIF Width neq ''>
  49.         <WIZSET aWidth = ' ' & DefaultCase('WIDTH') & '="' & Width & '"'>
  50.     <WIZELSE>
  51.         <WIZSET aWidth = ''>
  52.     </WIZIF>
  53.  
  54.     <WIZIF Align eq 1>
  55.         <WIZSET aAlign = ' ' & DefaultCase('ALIGN') & '="center"'>
  56.     <WIZELSEIF Align eq 2>
  57.         <WIZSET aAlign = ' ' & DefaultCase('ALIGN') & '="right"'>
  58.     <WIZELSE>
  59.         <WIZSET aAlign = ''>
  60.     </WIZIF>
  61.  
  62.     <WIZIF VAlign eq 0>
  63.         <WIZSET aVAlign = ' ' & DefaultCase('VALIGN') & '="top"'>
  64.     <WIZELSEIF VAlign eq 2>
  65.         <WIZSET aVAlign = ' ' & DefaultCase('VALIGN') & '="bottom"'>
  66.     <WIZELSEIF VAlign eq 3>
  67.         <WIZSET aVAlign = ' ' & DefaultCase('VALIGN') & '="baseline"'>
  68.     <WIZELSE>
  69.         <WIZSET aVAlign = ''>
  70.     </WIZIF>
  71.  
  72.     <WIZIF NoWrap eq 1>
  73.         <WIZSET aNoWrap = ' ' & DefaultCase('NOWRAP')>
  74.     <WIZELSE>
  75.         <WIZSET aNoWrap = ''>
  76.     </WIZIF>
  77.  
  78. <!----WIZIF IsFirstCell eq "NO">></WIZIF---->
  79.     <WIZIF 1>>
  80.     <$${CellTagName}$${aRowSpan}$${aColSpan}$${aWidth}$${aAlign}$${aVAlign}$${aNoWrap}>$${Content}</$${CellTagName}
  81.     </WIZIF>
  82.  
  83.     <WIZSET IsFirstCell = "NO">
  84.  
  85. </WIZIF>
  86.  
  87.